Option Explicit
Sub C_Sample039()
    Dim myWb As Workbook
    Set myWb = Workbooks(1)@@				'Cӂ̃ubN
    myWb.Saved = True
    Set myWb = Nothing@@					'IuWFNg̉
@End Sub
